<%
zm_kolor = 0
set objsp = server.CreateObject("adodb.recordset")
objsp.open "select id_specjalizacji_chor, nazwa_specjalizacji, count(*) as ile, sum(isnull(grupa0,0)) as ile0, sum(isnull(grupa1,0)) as ile1, sum(isnull(grupa2,0)) as ile2 from v_pytania_do_spec where id_specjalizacji_chor in (select id_specjalizacji from placowka_specjalizacje where id_placowki="&id_placowki&") and status=1 group by id_specjalizacji_chor, nazwa_specjalizacji order by nazwa_specjalizacji", conn,1,3
while not objsp.eof
if zm_kolor = 0 then
kolor_linii = "#ECF0FF"
else
kolor_linii = "#FFFFFF"
end if
zm_kolor = 1 - zm_kolor
%>
|
<%=objsp("nazwa_specjalizacji")%> |
|
<%=objsp("ile0")+objsp("ile1")+objsp("ile2")%> |
|
<%=objsp("ile0")%> |
|
<%=objsp("ile1")%> |
|
<%=objsp("ile2")%> |
|
&idp=<%=id_placowki%>">pokaż |
|
<%
objsp.movenext
wend
objsp.close
%>
|